home *** CD-ROM | disk | FTP | other *** search
/ Mac Cube 4: Multimedia Applications / MacCube Volume 4: Multimedia Applications.iso / Graphics / POV Ray / POVRAY II (No FPU) / DEMO / PIGMENT.POV < prev    next >
Text File  |  1993-10-01  |  2KB  |  48 lines
  1. // Persistence Of Vision Raytracer version 2.0 sample file.
  2.  
  3. #include "stage1.inc"
  4.  
  5. #declare Radius =2.5
  6. #declare RowSpace=1.35
  7. #declare ColSpace=1.25
  8. #declare Dist=0.9-Radius
  9. #declare Row3=-Dist
  10. #declare Row2=Row3+Radius*RowSpace*2
  11. #declare Row1=Row2+Radius*RowSpace*2
  12. #declare Col1= -Radius*ColSpace*4
  13. #declare Col2= Col1+Radius*ColSpace*2
  14. #declare Col3= Col2+Radius*ColSpace*2
  15. #declare Col4= Col3+Radius*ColSpace*2
  16. #declare Col5= Col4+Radius*ColSpace*2
  17.  
  18. camera{Camera1 translate <0,Row2,-180>}
  19.  
  20. #declare Thing=
  21. intersection {
  22.    sphere {<0, 0, 0>, 1}
  23.    object {UnitBox translate z*0.4 rotate 45*y}
  24.    bounded_by {UnitBox}
  25.    scale Radius
  26. }
  27.  
  28.  
  29. object {Thing pigment {agate}       translate <Col1 ,Row1 ,Dist>}
  30. object {Thing pigment {bozo}        translate <Col2 ,Row1 ,Dist>}
  31. object {Thing pigment {checker}     translate <Col3 ,Row1 ,Dist>}
  32. object {Thing pigment {color White} translate <Col4 ,Row1 ,Dist>}
  33. object {Thing pigment {gradient x}  translate <Col5 ,Row1 ,Dist>}
  34.  
  35. object {Thing pigment {granite}    translate <Col1 ,Row2 ,Dist>}
  36. object {Thing pigment {hexagon rotate -x*90}    translate <Col2 ,Row2 ,Dist>}
  37. object {Thing pigment {image_map{gif "test.gif"}
  38.         translate -(x+y)/2
  39.         scale 2*Radius}  translate <Col3 ,Row2 ,Dist>}
  40. object {Thing pigment {leopard scale .3}    translate <Col4 ,Row2 ,Dist>}
  41. object {Thing pigment {mandel 256} translate <Col5 ,Row2 ,Dist>}
  42.  
  43. object {Thing pigment {marble turbulence .8}  translate <Col1 ,Row3 ,Dist>}
  44. object {Thing pigment {onion}   translate <Col2 ,Row3 ,Dist>}
  45. object {Thing pigment {radial rotate -x*90}  translate <Col3 ,Row3 ,Dist>}
  46. object {Thing pigment {spotted} translate <Col4 ,Row3 ,Dist>}
  47. object {Thing pigment {wood turbulence .15 scale .5} translate <Col5 ,Row3 ,Dist>}
  48.